﻿Public Class Form1
  Private Sub RadioButton1_CheckedChanged(
        ByVal sender As System.Object,
        ByVal e As System.EventArgs) _
        Handles RadioButton1.CheckedChanged
    TextBox1.Text = "Opzione 1"
  End Sub

  Private Sub RadioButton2_CheckedChanged(
        ByVal sender As System.Object,
        ByVal e As System.EventArgs) _
        Handles RadioButton2.CheckedChanged
    TextBox1.Text = "Opzione 2"
  End Sub

  Private Sub RadioButton3_CheckedChanged(
        ByVal sender As System.Object,
        ByVal e As System.EventArgs) _
        Handles RadioButton3.CheckedChanged
    TextBox1.Text = "Opzione 3"
  End Sub

  Private Sub RadioButton4_CheckedChanged(
        ByVal sender As System.Object,
        ByVal e As System.EventArgs) _
        Handles RadioButton4.CheckedChanged
    TextBox2.Text = "Opzione 1"
  End Sub

  Private Sub RadioButton5_CheckedChanged(
        ByVal sender As System.Object,
        ByVal e As System.EventArgs) _
        Handles RadioButton5.CheckedChanged
    TextBox2.Text = "Opzione 2"
  End Sub

  Private Sub RadioButton6_CheckedChanged(
        ByVal sender As System.Object,
        ByVal e As System.EventArgs) _
        Handles RadioButton6.CheckedChanged
    TextBox2.Text = "Opzione 3"
  End Sub
End Class
